home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / livecd.squashfs / usr / lib / metasploit / exploits / Credits.pm < prev    next >
Encoding:
Perl POD Document  |  2006-06-30  |  10.3 KB  |  365 lines
  1.  
  2. ##
  3. # This file is part of the Metasploit Framework and may be redistributed
  4. # according to the licenses defined in the Authors field below. In the
  5. # case of an unknown or missing license, this file defaults to the same
  6. # license as the core Framework (dual GPLv2 and Artistic). The latest
  7. # version of the Framework can always be obtained from metasploit.com.
  8. ##
  9.  
  10. package Msf::Exploit::Credits;
  11. use strict;
  12. use base 'Msf::Exploit';
  13. use Msf::Socket::Tcp;
  14. use FindBin qw{$RealScript};
  15.  
  16. my $advanced = {
  17.   'SleepLength' => [4, 'Length to sleep between people'],
  18. };
  19.  
  20. my $info = {
  21.   'Name'    => 'Metasploit Framework Credits',
  22.   'Version'  => '$Revision: 1.24 $',
  23.   'Authors' => [ 'The Metasploit Development Team', ],
  24.   'Arch'    => [  ],
  25.   'OS'      => [  ],
  26.   'Priv'    => 0,
  27.   'UserOpts'  =>
  28.     {
  29.     },
  30.   'Description'  => Pex::Text::Freeform(qq{
  31.     This module will display a list of the Metasploit developers and 
  32.     contributors. If you have submitted something to the project and
  33.     do not see your name or handle here, please drop us an email.
  34.     }),
  35.   'Refs'  =>
  36.     [
  37.       'http://www.metasploit.com',
  38.     ],
  39.   'Keys' => ['credits'],
  40. };
  41.  
  42. sub new {
  43.   my $class = shift;
  44.   my $self = $class->SUPER::new({'Info' => $info, 'Advanced' => $advanced}, @_);
  45.  
  46.   return($self);
  47. }
  48.  
  49. sub Exploit {
  50.   my $self = shift;
  51.  
  52. #  my $target = $self->Targets->[$targetIndex];
  53.  
  54.   my $sleep = $self->GetLocal('SleepLength');
  55.  
  56.   $self->PrintFrame;
  57.   sleep(1);
  58.   $self->PrintClear;
  59.  
  60.   $self->PrintHD;
  61.   sleep($sleep);
  62.   $self->PrintClear;
  63.   
  64.   $self->PrintSpoonm;
  65.   sleep($sleep);
  66.   $self->PrintClear;
  67.   
  68.   $self->PrintClear;
  69.   $self->PrintSkape;
  70.   sleep($sleep);
  71.   
  72.   $self->PrintClear;
  73.   $self->PrintOptyx;
  74.   sleep($sleep);
  75.   
  76.   $self->PrintClear;
  77.   $self->PrintVlad;
  78.   sleep($sleep);
  79.   
  80.   $self->PrintClear; 
  81.   
  82.   
  83.   $self->PrintGeneralContrib;
  84.   sleep(1);
  85.   $self->PrintGeneralNames;
  86.   sleep(5);
  87.   
  88. }
  89.  
  90. sub PrintClear {
  91.   my $self = shift;
  92.   $self->PrintLine("\n" x 4);
  93. }
  94.  
  95. sub PrintFrame {
  96.   my $self = shift;
  97.  
  98.   my $frame = q{
  99.   #########################################
  100.  
  101.          Framework Development Team
  102.  
  103.   #########################################
  104.  
  105.  
  106. };
  107.  
  108.   $self->PrintLine($frame);
  109. }
  110.  
  111. sub PrintMainContrib {
  112.   my $self = shift;
  113.  
  114.   my $frame = q{
  115.   #########################################
  116.  
  117.      Repeat Offenders (Main Contributors)
  118.  
  119.   #########################################
  120.  
  121.  
  122. };
  123.  
  124.   $self->PrintLine($frame);
  125. }
  126.  
  127. sub PrintGeneralContrib {
  128.   my $self = shift;
  129.  
  130.   my $frame = q{
  131.   #########################################
  132.  
  133.             General Contributors
  134.  
  135.   #########################################
  136.  
  137.  
  138. };
  139.  
  140.   $self->PrintLine($frame);
  141. }
  142.  
  143.  
  144. sub PrintGeneralNames {
  145.     my $self = shift;
  146.     my $names = q@
  147.  
  148. Exploit Contributors:
  149.  
  150.     + trew + bmc + marco + jcyberpnk + stinko 
  151.     + one-two + optyx + skape + spoonm + TD
  152.     + juliano + hdm + arrigo + 0dd + grutz
  153.     + sam_ + noir + thor + vlad902 + ghandi
  154.     + acaro + cybertronic + solar eclipse
  155.     + et lownoise + thief + MC + str0ke  
  156.     + david maciejak + nicob + muts 
  157.  
  158.  
  159. Payload Contributors:
  160.  
  161.     + bighawk + skape + optyx + vlad902
  162.     + lsd + spoonm + gera + acuttergo 
  163.     + ghandi + jarrko + hdm 
  164.  
  165.  
  166. Encoder Contributors:
  167.     
  168.     + juliano + ghandi + spoonm + optyx
  169.     + skylined + hdm + skape + vlad902
  170.  
  171.  
  172. Nop Contributors:
  173.  
  174.     + k2 + spoonm + optyx + hdm + vlad902
  175.  
  176.  
  177. Feedback & Testing:
  178.  
  179.     + msf beta team + arrigo + marco + stinko
  180.     + slow + ddi + 0dd + lupin2000 + MC
  181.     + valsmith + framework-list
  182.  
  183.  
  184. Graphics & Logos:
  185.  
  186.     + jbl + riotz + cowsay + figlet
  187.  
  188.  
  189. @;
  190.  
  191.     $self->PrintLine($names);
  192. }
  193.  
  194.  
  195.  
  196. sub PrintHD {
  197.   my $self = shift;
  198.  
  199.   my $hd = q@
  200.      .--""--.    
  201.    .'        '.      Name: HD Moore
  202.   /   .'``'.   \   Skills: 31337
  203.  |  .'/.\/.\'.  |   Quote: "Sure, that will take 5 minutes..."
  204.  |  : |_/\_| ;  |  
  205.   \ '.\    /.' /   Reponsible For:
  206.   /'. `'--'` .'\     Metasploit Project
  207.  /_  `-./\.-'  _\'   Metasploit Framework
  208. )_/  I'm With  \_)   Win32 Payloads and Exploits
  209.       0day ->        Encoders, SMB, Tab Completion
  210.   '------------'`
  211.  
  212.  
  213. @;
  214.  
  215.   $self->PrintLine($hd);
  216. }
  217.  
  218. sub PrintSpoonm {
  219.   my $self = shift;
  220.   my $spoon = 
  221.     "\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x2e\x2d".
  222.     "\x2d\x2d\x2d\x2d\x2e\x0a\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20".
  223.     "\x20\x20\x2c\x27\x20\x2d\x20\x20\x20\x2d\x20\x60\x2e\x0a\x20\x20".
  224.     "\x20\x20\x5f\x20\x5f\x5f\x5f\x5f\x5f\x2f\x20\x20\x3c\x71\x3e\x20".
  225.     "\x3c\x70\x3e\x20\x20\x5c\x5f\x5f\x5f\x5f\x5f\x20\x5f\x0a\x20\x20".
  226.     "\x20\x2f\x5f\x7c\x7c\x20\x20\x20\x7c\x7c\x60\x2d\x2e\x5f\x5f\x5f".
  227.     "\x5f\x5f\x2e\x2d\x60\x7c\x7c\x20\x20\x20\x7c\x7c\x2d\x5c\x20\x20".
  228.     "\x20\x20\x4e\x61\x6d\x65\x3a\x20\x73\x70\x6f\x6f\x6e\x6d\x0a\x20".
  229.     "\x20\x2f\x20\x5f\x7c\x7c\x3d\x3d\x3d\x7c\x7c\x20\x20\x20\x20\x20".
  230.     "\x20\x20\x20\x20\x20\x20\x7c\x7c\x3d\x3d\x3d\x7c\x7c\x20\x5f\x5c".
  231.     "\x20\x53\x6b\x69\x6c\x6c\x73\x3a\x20\x4f\x4f\x50\x65\x72\x6c\x20".
  232.     "\x61\x6e\x64\x20\x41\x73\x6d\x20\x43\x6f\x77\x62\x6f\x79\x0a\x20".
  233.     "\x7c\x2d\x20\x5f\x7c\x7c\x3d\x3d\x3d\x7c\x7c\x3d\x3d\x3d\x3d\x3d".
  234.     "\x3d\x3d\x3d\x3d\x3d\x3d\x7c\x7c\x3d\x3d\x3d\x7c\x7c\x2d\x20\x5f".
  235.     "\x7c\x20\x51\x75\x6f\x74\x65\x3a\x20\x22\x22\x0a\x20\x5c\x5f\x5f".
  236.     "\x5f\x7c\x7c\x5f\x5f\x5f\x7c\x7c\x5f\x5f\x5f\x5f\x5f\x5f\x5f\x5f".
  237.     "\x5f\x5f\x5f\x7c\x7c\x5f\x5f\x5f\x7c\x7c\x5f\x5f\x5f\x2f\x0a\x20".
  238.     "\x20\x5c\x5c\x7c\x2f\x2f\x2f\x20\x20\x20\x5c\x5f\x3a\x5f\x3a\x5f".
  239.     "\x3a\x5f\x3a\x5f\x3a\x5f\x2f\x20\x20\x20\x5c\x5c\x5c\x7c\x2f\x2f".
  240.     "\x20\x52\x65\x73\x70\x6f\x6e\x73\x69\x62\x6c\x65\x20\x46\x6f\x72".
  241.     "\x3a\x0a\x20\x20\x7c\x20\x20\x20\x5f\x7c\x20\x20\x20\x20\x7c\x5f".
  242.     "\x5f\x5f\x5f\x5f\x5f\x5f\x5f\x5f\x7c\x20\x20\x20\x20\x7c\x20\x20".
  243.     "\x20\x5f\x7c\x20\x20\x20\x4d\x65\x74\x61\x73\x70\x6c\x6f\x69\x74".
  244.     "\x20\x46\x72\x61\x6d\x65\x77\x6f\x72\x6b\x0a\x20\x20\x7c\x20\x20".
  245.     "\x20\x5f\x7c\x20\x20\x20\x2f\x28\x20\x3d\x3d\x3d\x3d\x3d\x3d\x3d".
  246.     "\x20\x29\x5c\x20\x20\x20\x7c\x20\x20\x20\x5f\x7c\x20\x20\x20\x42".
  247.     "\x72\x61\x69\x6e\x62\x75\x73\x74\x69\x6e\x67\x20\x44\x79\x6e\x61".
  248.     "\x6d\x69\x63\x20\x4f\x4f\x0a\x20\x20\x5c\x5c\x7c\x7c\x2f\x2f\x20".
  249.     "\x20\x2f\x5c\x20\x60\x2d\x2e\x5f\x5f\x5f\x2e\x2d\x27\x20\x2f\x5c".
  250.     "\x20\x20\x5c\x5c\x7c\x7c\x2f\x2f\x20\x20\x20\x45\x78\x70\x6c\x6f".
  251.     "\x69\x74\x73\x20\x61\x6e\x64\x20\x50\x61\x79\x6c\x6f\x61\x64\x73".
  252.     "\x0a\x20\x20\x20\x28\x6f\x20\x29\x20\x20\x2f\x5f\x20\x27\x2e\x5f".
  253.     "\x5f\x5f\x5f\x5f\x5f\x5f\x2e\x27\x20\x5f\x5c\x20\x20\x28\x20\x6f".
  254.     "\x29\x20\x20\x20\x20\x53\x6f\x63\x6b\x65\x74\x20\x4e\x69\x6e\x6a".
  255.     "\x69\x74\x73\x75\x0a\x20\x20\x2f\x5f\x5f\x2f\x20\x5c\x20\x7c\x20".
  256.     "\x20\x20\x20\x5f\x7c\x20\x20\x20\x7c\x5f\x20\x20\x20\x5f\x7c\x20".
  257.     "\x2f\x20\x5c\x5f\x5f\x5c\x0a\x20\x20\x2f\x2f\x2f\x5c\x5f\x2f\x20".
  258.     "\x7c\x5f\x20\x20\x20\x5f\x7c\x20\x20\x20\x7c\x20\x20\x20\x20\x5f".
  259.     "\x7c\x20\x5c\x5f\x2f\x5c\x5c\x5c\x0a\x20\x2f\x2f\x2f\x5c\x5c\x5f".
  260.     "\x5c\x20\x5c\x20\x20\x20\x20\x5f\x2f\x20\x20\x20\x5c\x20\x20\x20".
  261.     "\x20\x5f\x2f\x20\x2f\x5f\x2f\x2f\x5c\x5c\x5c\x0a\x20\x5c\x5c\x7c".
  262.     "\x2f\x2f\x5f\x2f\x20\x2f\x2f\x2f\x7c\x5c\x5c\x5c\x20\x20\x20\x2f".
  263.     "\x2f\x2f\x7c\x5c\x5c\x5c\x20\x5c\x5f\x5c\x5c\x7c\x2f\x2f\x0a\x20".
  264.     "\x20\x20\x20\x20\x20\x20\x20\x20\x5c\x5c\x5c\x7c\x2f\x2f\x2f\x20".
  265.     "\x20\x20\x5c\x5c\x5c\x7c\x2f\x2f\x2f\x0a\x20\x20\x20\x20\x20\x20".
  266.     "\x20\x20\x20\x2f\x2d\x20\x20\x5f\x5c\x5c\x20\x20\x20\x2f\x2f\x20".
  267.     "\x20\x20\x5f\x5c\x0a\x20\x20\x20\x20\x20\x20\x20\x20\x20\x7c\x20".
  268.     "\x20\x20\x5f\x7c\x7c\x20\x20\x20\x7c\x7c\x2d\x20\x20\x5f\x7c\x0a".
  269.     "\x20\x20\x20\x20\x20\x20\x20\x2c\x2f\x5c\x5f\x5f\x5f\x5f\x7c\x7c".
  270.     "\x20\x20\x20\x7c\x7c\x20\x5f\x5f\x5f\x2f\x5c\x2c\x0a\x20\x20\x20".
  271.     "\x20\x20\x20\x2f\x7c\x5c\x5f\x5f\x5f\x60\x5c\x2c\x7c\x20\x20\x20".
  272.     "\x7c\x2c\x2f\x27\x5f\x5f\x5f\x2f\x7c\x5c\x0a\x20\x20\x20\x20\x20".
  273.     "\x20\x7c\x7c\x7c\x60\x2e\x5c\x5c\x20\x5c\x5c\x20\x20\x20\x2f\x2f".
  274.     "\x20\x2f\x2f\x2c\x27\x7c\x7c\x7c\x0a\x20\x20\x20\x20\x20\x20\x5c".
  275.     "\x5c\x5c\x5c\x5f\x2f\x2f\x5f\x2f\x2f\x20\x20\x20\x5c\x5c\x5f\x5c".
  276.     "\x5c\x5f\x2f\x2f\x2f\x2f\x20\x4c\x47\x42\x2f\x66\x73\x63";
  277.  
  278.   $self->PrintLine($spoon);
  279.   return;
  280. }
  281.  
  282.  
  283. sub PrintSkape {
  284.   my $self = shift;
  285.  
  286.   my $skape = q{
  287.     __________               
  288.   ."          ".  
  289.   | .--------. |     Name: Skape
  290.  /` |________| `\  Skills: Win32 and x86 Asm Ninja 
  291. |  / / .\/. \ \  |  Quote: "Skape rewrote my shellcode in half the size, again"
  292. \_/  \__/\__/  \_/ 
  293.   \            /   Reponsible For:
  294.   /'._  --  _.'\     Windows/Linux Library Injection
  295.  /_   `""""`   _\    Small Payloads
  296.  )_|   hick    |_)   BSDI Exploits and Payloads
  297.    \__________/|;    Meterpreter
  298.    '----------'      Opcode Database  
  299.  
  300. };
  301.  
  302.   $self->PrintLine($skape);
  303. }
  304.  
  305. sub PrintOptyx {
  306.   my $self = shift;
  307.  
  308.   my $optyx = q@
  309.             _            _.,----,                                    
  310.  __  _.-._ / '-.        -  ,._  \)      
  311. |  `-)_   '-.   \       / < _ )/" } 
  312. /___   '-.   \   '-, ___(c-(6)=(6)
  313.  ,  '.    -._ '.  _,'   >\    "  ) 
  314.  :;;,,'-._   '---' (  ( "/`. -='/ 
  315. ;:;;:;;,   \._     .`-.)Y'- '--'    Name: Optyx
  316. ;';:;;;;;'-._ /'._|   |//  _/' \  Skills: One of the Ancients
  317.       '''"._ F    |  _/ _.'._   `\ Quote: "So I found this bug in gravity..."
  318.              L    \   \/     '._  \ 
  319.       .-,-,_ |     `.  `'---,  \_ _|    
  320.       //    '|    /  \,   ("--',=`)7    
  321.      | `._       : _,  \  /'`-._\,_'-._ 
  322.      '--' '-.\__/ _L   .`'         '.// 
  323.                  [ (  /    Responsible For:             
  324.                   ) `{       Encoders, Exploits, Payloads             
  325.        snd        \__)       Sparc, PPC, Mips Eliteness
  326. @;
  327.  
  328.   $self->PrintLine($optyx);
  329. }
  330.  
  331. sub PrintVlad {
  332.   my $self = shift;
  333.  
  334.   my $vlad902 = q@
  335.           __________
  336.           |        |
  337.           |________|
  338.            |      |
  339.         .-'        '-.
  340.      .-'    .---.     '-.
  341.   .-'     .'.--. '.      '-.
  342.  /        ' /~`') '         \
  343. |         '.`, ( .'          |   Name: Vlad902
  344. |           '---'            | Skills: Many
  345. |     .           .      .   |  Quote: "God I love this e250"
  346. | ,-. |-. ,-. ,-. |  . . |-  |
  347. | ,-| | | `-. | | |  | | |   | Responsible For:
  348. | `-^ ^-' `-' `-' `' `-^ `'  |   BSD Exploits and Payloads
  349. |                            |   Sparc and Alpha Kung Foo
  350. ,.   , ,,--. .,--. ,, ,    ,.|   SunRPC and XDR codeage
  351. ||  /  |   |  |   \ |/    / || 
  352. || /   |   |  |   / |\   /~~||
  353. |`'    `---' `^--' ,' `,'   `|
  354. |                            |
  355. |                            |
  356. |                            |
  357. |                            | ML  
  358.  \__________________________/
  359.  
  360. @;
  361.  
  362.   $self->PrintLine($vlad902);
  363. }
  364. 1;
  365.